% Generate distribution of fixed costs of exporting, given distributions of firm efficiency and fixed costs of importing
% using standard normal draws and parameters 

function fx = DrawFixedCostsExporting(param,Z,phi,fc)

lnphi = log(phi); % log efficiency
lnfc = log(fc);   % log fixed cost of importing
a4 = param.a4; a5 = param.a5; a6 = param.a6; a7 = param.a7;
lnfx = a4 + a5*lnphi + a6*lnfc + a7*Z; % log fixed cost of importing given log efficiency, log fixed cost of importing, and shock
fx = exp(lnfx);

end